(map char->number '(#\1 #\A #\f))	; => (1 10 15)

(map number->char '(4 9 14))		; => (#\4 #\9 #\E)

(char->symbol #\c)			; => c
